home *** CD-ROM | disk | FTP | other *** search
/ Express Pd: GALORE / Express Pd Galore - The Amiga PD & Shareware CD (1994)(Express Pd)[!][Amiga-CD32-CDTV].iso / music / eagleplayer / rexx / ep_closeplwindow.dopus < prev    next >
Text File  |  1993-12-27  |  309b  |  16 lines
  1. /* Eagleplayeransteuerung über Diropus
  2.    (c) 1993 DEFECT
  3.    schließt Eagleplayer PlayerWindow
  4. */
  5. if (pos('rexx_EP',SHOW('Ports')) = 0) then 
  6.  do
  7.   address 'DOPUS.1'
  8.   toptext 'No Eagleplayer found'
  9.   exit
  10.  end
  11. address 'rexx_EP'
  12. Closeplwindow
  13. address 'DOPUS.1'
  14. toptext 'Eagleplayer: Playerwindow closed'
  15. exit
  16.